home *** CD-ROM | disk | FTP | other *** search
/ FishMarket 1.0 / FishMarket v1.0.iso / fishies / 376-400 / disk_386 / xlispstat / src1.lzh / Headers / osptrs.h < prev    next >
C/C++ Source or Header  |  1990-10-08  |  25KB  |  762 lines

  1. #ifndef OSPTRS_H
  2. #define OSPTRS_H
  3. #ifndef XLISP_ONLY
  4. /************************************************************************/
  5. /************************************************************************/
  6. /**                                                                    **/
  7. /**                          Object Methods                            **/
  8. /**                                                                    **/
  9. /************************************************************************/
  10. /************************************************************************/
  11.  
  12. /* objects.c */
  13. {    NULL,                S, xsmessage_method        }, /* 300 */
  14. {    NULL,                S, xsreparent_object        }, 
  15. {    NULL,                S, xshas_slot            }, 
  16. {    NULL,                S, xshas_method            },
  17. {    NULL,                S, xsadd_slot            },
  18. {    NULL,                S, xsdelete_slot        },
  19. {    NULL,                S, xsadd_method            },
  20. {    NULL,                S, xsdelete_method        },
  21. {    NULL,                S, xsshow_object        },
  22. {    NULL,                S, xsobject_isnew        },
  23. {    NULL,                S, xsparents            },
  24. {    NULL,                S, xsprecedence_list        },
  25. {    NULL,                S, xsobject_slots        },
  26. {    NULL,                S, xsobject_methods        },
  27. {    NULL,                S, xsobject_documentation    },
  28. {    NULL,                S, xsmakeproto            },
  29.  
  30. /* hardware-objects */
  31. {    NULL,                S, xsobject_null_method        },
  32. {    NULL,                S, xsobject_null_method        },
  33. {    NULL,                S, xsobject_null_method        },
  34.  
  35. /* windows.c */
  36. {    NULL,                S, xsshowwindow            },
  37. {    NULL,                S, xshidewindow            },
  38. {    NULL,                S, xshidewindow            },
  39. {    NULL,                S, xswindow_title        },
  40. {    NULL,                S, xswindow_location        },
  41. {    NULL,                S, xswindow_size        },
  42. {    NULL,                S, xswindow_frame_location    },
  43. {    NULL,                S, xswindow_frame_size        },
  44. {    NULL,                S, xsobject_null_method        },
  45. {    NULL,                S, xsobject_null_method        },
  46. {    NULL,                S, xsobject_null_method        },
  47. {    NULL,                S, xsobject_null_method        },
  48. {    NULL,                S, xsobject_null_method        },
  49. {    NULL,                S, xsobject_null_method        },
  50. {    NULL,                S, xsobject_null_method        },
  51. {    NULL,                S, xsobject_null_method        },
  52. {    NULL,                S, xsobject_null_method        },
  53. {    NULL,                S, xsobject_null_method        },
  54. {    NULL,                S, xsobject_null_method        },
  55.  
  56. #ifdef MACINTOSH
  57. /* edit.c */
  58. {    NULL,                S, xsedit_window_isnew        },
  59. {    NULL,                S, xsedit_window_allocate    },
  60. {    NULL,                S, xsedit_window_cut        },
  61. {    NULL,                S, xsedit_window_copy        },
  62. {    NULL,                S, xsedit_window_paste        },
  63. {    NULL,                S, xsedit_window_revert        },
  64. {    NULL,                S, xsedit_window_save        },
  65. {    NULL,                S, xsedit_window_save_as    },
  66. {    NULL,                S, xsedit_window_save_copy    },
  67. {    NULL,                S, xsedit_window_paste_stream    },
  68. {    NULL,                S, xsedit_window_paste_string    },
  69. {    NULL,                S, xsedit_window_flush_window    },
  70. {    NULL,                S, xsedit_window_selection_stream},
  71. {    NULL,                S, xsedit_window_remove        },
  72. {    NULL,                S, xsedit_window_remove        },
  73. {    NULL,                S, xsedit_window_remove        },
  74. {    NULL,                S, xsedit_window_activate    },
  75. {    NULL,                S, xsedit_window_update        },
  76. {    NULL,                S, xsedit_window_find        },
  77. {    NULL,                S, xslistener_isnew        },
  78. {    NULL,                S, xslistener_allocate        },
  79. {    NULL,                S, xshidewindow            },
  80. {    NULL,                S, xshidewindow            },
  81. {    NULL,                S, xshidewindow            },
  82. #endif MACINTOSH
  83.  
  84. /* menus.c */
  85. {    NULL,                S, xsmenu_isnew            },
  86. {    NULL,                S, xsallocate_menu        },
  87. {    NULL,                S, xsdispose_menu        },
  88. {    NULL,                S, xsinstall_menu        },
  89. {    NULL,                S, xsremove_menu        },
  90. {    NULL,                S, xsmenu_enabled        },
  91. {    NULL,                S, xsupdate_menu        },
  92. {    NULL,                S, xsallocated_p        },
  93. {    NULL,                S, xsmenu_title            },
  94. {    NULL,                S, xsmenu_items            },
  95. {    NULL,                S, xsinstalled_p        },
  96. {    NULL,                S, xsappend_items        },
  97. {    NULL,                S, xsdelete_items        },
  98. {    NULL,                S, xsmenu_select        },
  99. {    NULL,                S, xsmenu_popup            },
  100. #ifdef MACINTOSH
  101. {    NULL,                S, xsapple_menu_isnew        }, 
  102. {    NULL,                S, xsapple_menu_select        }, 
  103. #endif MACINTOSH
  104. {    NULL,                S, xsitem_isnew            },
  105. {    NULL,                S, xsitem_title            },
  106. {    NULL,                S, xsitem_key            },
  107. {    NULL,                S, xsitem_mark            },
  108. {    NULL,                S, xsitem_style            },
  109. {    NULL,                S, xsitem_action        },
  110. {    NULL,                S, xsitem_enabled        },
  111. {    NULL,                S, xsitem_installed_p        },
  112. {    NULL,                S, xsitem_update        },
  113. {    NULL,                S, xsitem_do_action        },
  114.  
  115. /* dialog.c */
  116. {    NULL,                S, xsdialog_isnew        },
  117. {    NULL,                S, xsdialog_allocate        },
  118. {    NULL,                S, xsdialog_remove        },
  119. {    NULL,                S, xsdialog_remove        },
  120. {    NULL,                S, xsdialog_remove        },
  121. {    NULL,                S, xsdialog_allocated_p        },
  122. {    NULL,                S, xsdialog_default_button    },
  123. {    NULL,                S, xsdialog_modal        },
  124. {    NULL,                S, xsdialog_item_do_action    },
  125. {    NULL,                S, xsdialog_item_action        },
  126. {    NULL,                S, xsbutton_item_isnew        },
  127. {    NULL,                S, xstoggle_item_isnew        },
  128. {    NULL,                S, xstoggle_item_value        },
  129. {    NULL,                S, xstext_item_isnew        },
  130. {    NULL,                S, xstext_item_text        },
  131. {    NULL,                S, xschoice_item_isnew        },
  132. {    NULL,                S, xschoice_item_value        },
  133. {    NULL,                S, xsscroll_item_isnew        },
  134. {    NULL,                S, xsscroll_item_value        },
  135. {    NULL,                S, xsscroll_item_max        },
  136. {    NULL,                S, xsscroll_item_min        },
  137. {    NULL,                S, xsscroll_item_action        },
  138. /*#ifdef MACINTOSH*/
  139. {    NULL,                S, xslist_item_isnew        },
  140. {    NULL,                S, xslist_item_action        },
  141. {    NULL,                S, xslist_item_text        },
  142. {    NULL,                S, xslist_item_selection    },
  143. /*#endif MACINTOSH*/
  144.  
  145. /* xsiviewwindow.c */
  146. {    NULL,                S, iview_window_isnew        },
  147. {    NULL,                S, iview_window_allocate    },
  148.  
  149. {    NULL,                S, iview_window_idle_on        },
  150.  
  151. {    NULL,                S, iview_window_menu        },
  152.  
  153. {    NULL,                S, xsiview_window_update    },
  154. {    NULL,                S, xsiview_window_activate    },
  155.  
  156. {    NULL,                S, iview_window_remove        },
  157. {    NULL,                S, iview_window_remove        },
  158. {    NULL,                S, iview_window_remove        },
  159. {    NULL,                S, iview_window_while_button_down},
  160. {    NULL,                S, iview_window_show_window    },
  161. {    NULL,                S, xsobject_null_method        },
  162. {    NULL,                S, xsobject_null_method        },
  163. {    NULL,                S, xsobject_null_method        },
  164. {    NULL,                S, xsobject_null_method        },
  165. {    NULL,                S, xsobject_null_method        },
  166. {    NULL,                S, xsobject_null_method        },
  167. {    NULL,                S, xsobject_null_method        },
  168. {    NULL,                S, xsobject_null_method        },
  169.  
  170. {    NULL,                S, iview_window_canvas_width    },
  171. {    NULL,                S, iview_window_canvas_height    },
  172. {    NULL,                S, iview_window_line_type    },
  173. {    NULL,                S, iview_window_draw_mode    },
  174. {    NULL,                S, iview_window_draw_color    },
  175. {    NULL,                S, iview_window_back_color    },
  176. {    NULL,                S, iview_window_use_color    },
  177. {    NULL,                S, iview_window_reverse_colors    },
  178. {    NULL,                S, iview_window_view_rect    },
  179. {    NULL,                S, iview_window_line_width    },
  180. {    NULL,                S, iview_window_clip_rect    },
  181. {    NULL,                S, iview_window_cursor        },
  182.  
  183. {    NULL,                S, iview_window_has_h_scroll    },
  184. {    NULL,                S, iview_window_has_v_scroll    },
  185. {    NULL,                S, iview_window_scroll        },
  186. {    NULL,                S, iview_window_h_scroll_incs    },
  187. {    NULL,                S, iview_window_v_scroll_incs    },
  188.  
  189. {    NULL,                S, iview_window_draw_line    },
  190. {    NULL,                S, iview_window_draw_point    },
  191. {    NULL,                S, iview_window_erase_rect    },
  192. {    NULL,                S, iview_window_frame_rect    },
  193. {    NULL,                S, iview_window_paint_rect    },
  194. {    NULL,                S, iview_window_erase_oval    },
  195. {    NULL,                S, iview_window_frame_oval    },
  196. {    NULL,                S, iview_window_paint_oval    },
  197. {    NULL,                S, iview_window_erase_arc    },
  198. {    NULL,                S, iview_window_frame_arc    },
  199. {    NULL,                S, iview_window_paint_arc    },
  200. {    NULL,                S, iview_window_erase_poly    },
  201. {    NULL,                S, iview_window_frame_poly    },
  202. {    NULL,                S, iview_window_paint_poly    },
  203.  
  204. {    NULL,                S, iview_window_text_ascent    },
  205. {    NULL,                S, iview_window_text_descent    },
  206. {    NULL,                S, iview_window_text_width    },
  207. {    NULL,                S, iview_window_draw_string    },
  208. {    NULL,                S, iview_window_draw_string_up    },
  209. {    NULL,                S, iview_window_draw_text    },
  210. {    NULL,                S, iview_window_draw_text_up    },
  211.  
  212. {    NULL,                S, iview_window_draw_symbol    },
  213. {    NULL,                S, iview_window_replace_symbol    },
  214.  
  215. {    NULL,                S, iview_window_start_buffering    },
  216. {    NULL,                S, iview_window_buffer_to_screen},
  217.  
  218. #ifdef MACINTOSH
  219. {    NULL,                S, iview_window_copy_to_clip    },
  220. #endif MACINTOSH
  221. {    NULL,                S, iview_window_drag_grey_rect    },
  222. {    NULL,                S, iview_window_dump_image    },
  223. {    NULL,                S, gw_draw_bitmap        },
  224.  
  225. /* xsiview.c */
  226. {    NULL,                S, iview_isnew            },
  227. {    NULL,                S, iview_allocate        },
  228.  
  229. {    NULL,                S, iview_std_resize        },
  230. {    NULL,                S, iview_std_redraw        },
  231. {    NULL,                S, iview_std_redraw_background    },
  232. {    NULL,                S, iview_std_redraw_content    },
  233. {    NULL,                S, xsobject_null_method        },
  234. {    NULL,                S, xsobject_null_method        },
  235. {    NULL,                S, xsobject_null_method        },
  236. {    NULL,                S, iview_std_adjust_screen    },
  237. {    NULL,                S, iview_std_adjust_points_in_rect},
  238. {    NULL,                S, iview_std_adjust_screen_point},
  239. {    NULL,                S, iview_std_mark_points_in_rect},
  240.  
  241. {    NULL,                S, iview_content_rect        },
  242. {    NULL,                S, iview_content_origin        },
  243. {    NULL,                S, iview_content_variables    },
  244. {    NULL,                S, iview_click_range        },
  245. {    NULL,                S, iview_mouse_mode        },
  246. {    NULL,                S, iview_showing_labels        },
  247. {    NULL,                S, iview_margin            },
  248. {    NULL,                S, iview_fixed_aspect        },
  249. {    NULL,                S, iview_dirty            },
  250.  
  251. {    NULL,                S, iview_x_axis            },
  252. {    NULL,                S, iview_y_axis            },
  253.  
  254. {    NULL,                S, iview_brush            },
  255. {    NULL,                S, iview_erase_brush        },
  256. {    NULL,                S, iview_draw_brush        },
  257. {    NULL,                S, iview_move_brush        },
  258. {    NULL,                S, iview_resize_brush        },
  259.  
  260. {    NULL,                S, iview_do_click        },
  261. {    NULL,                S, iview_do_motion        },
  262. {    NULL,                S, iview_std_click        },
  263. {    NULL,                S, iview_std_click        },
  264. {    NULL,                S, iview_std_motion        },
  265. {    NULL,                S, iview_unselect_all_points    },
  266. {    NULL,                S, iview_erase_selection    },
  267. {    NULL,                S, iview_mask_selection        },
  268. {    NULL,                S, iview_unmask_all_points    },
  269. {    NULL,                S, iview_points_showing        },
  270. {    NULL,                S, iview_points_hilited        },
  271. {    NULL,                S, iview_points_selected    },
  272. {    NULL,                S, iview_points_selected    },
  273. {    NULL,                S, iview_show_all_points    },
  274. {    NULL,                S, iview_all_points_showing    },
  275. {    NULL,                S, iview_all_points_unmasked    },
  276. {    NULL,                S, iview_any_points_selected    },
  277.  
  278. {    NULL,                S, iview_linked            },
  279. #ifndef OLDLINKS
  280. {    NULL,                S, iview_links            },
  281. #endif OLDLINKS
  282.  
  283. {    NULL,                S, iview_num_variables        },
  284. {    NULL,                S, iview_variable_label        },
  285. {    NULL,                S, iview_range            },
  286. {    NULL,                S, iview_scaled_range        },
  287. {    NULL,                S, iview_screen_range        },
  288. {    NULL,                S, iview_transformation        },
  289. {    NULL,                S, iview_apply_transformation    },
  290.  
  291. {    NULL,                S, iview_add_points        },
  292. {    NULL,                S, iview_clear_points        },
  293. {    NULL,                S, iview_num_points        },
  294. {    NULL,                S, iview_point_coordinate    },
  295. {    NULL,                S, iview_point_screen_coordinate},
  296. {    NULL,                S, iview_point_transformed_coordinate    },
  297. {    NULL,                S, iview_point_masked        },
  298. {    NULL,                S, iview_point_color        },
  299. {    NULL,                S, iview_point_state        },
  300. {    NULL,                S, iview_point_screen_state    },
  301. {    NULL,                S, iview_point_marked        },
  302. {    NULL,                S, iview_point_label        },
  303. {    NULL,                S, iview_point_symbol        },
  304. {    NULL,                S, iview_point_selected        },
  305. {    NULL,                S, iview_point_hilited        },
  306. {    NULL,                S, iview_point_showing        },
  307.  
  308. {    NULL,                S, iview_add_lines        },
  309. {    NULL,                S, iview_clear_lines        },
  310. {    NULL,                S, iview_num_lines        },
  311. {    NULL,                S, iview_line_coordinate    },
  312. {    NULL,                S, iview_line_screen_coordinate    },
  313. {    NULL,                S, iview_line_transformed_coordinate    },
  314. {    NULL,                S, iview_line_masked        },
  315. {    NULL,                S, iview_line_color        },
  316. {    NULL,                S, iview_line_next        },
  317. {    NULL,                S, iview_line_type        },
  318. {    NULL,                S, iview_line_width        },
  319.  
  320. #ifdef USESTRINGS
  321. {    NULL,                S, iview_add_strings        },
  322. {    NULL,                S, iview_clear_strings        },
  323. {    NULL,                S, iview_num_strings        },
  324. {    NULL,                S, iview_string_coordinate    },
  325. {    NULL,                S, iview_string_screen_coordinate},
  326. {    NULL,                S, iview_string_transformed_coordinate    },
  327. {    NULL,                S, iview_string_masked        },
  328. {    NULL,                S, iview_string_color        },
  329. {    NULL,                S, iview_string_modifiers    },
  330. #endif /* USESTRINGS */
  331.  
  332. {    NULL,                S, iview_draw_data_points    },
  333. {    NULL,                S, iview_draw_data_lines    },
  334. #ifdef USESTRINGS
  335. {    NULL,                S, iview_draw_data_strings    },
  336. #endif /* USESTRINGS */
  337.  
  338. {    NULL,                S, iview_rotate_2        },
  339.  
  340. {    NULL,                S, iview_adjust_to_data        },
  341. {    NULL,                S, iview_visible_range        },
  342. {    NULL,                S, iview_scale_to_range        },
  343. {    NULL,                S, iview_scale            },
  344. {    NULL,                S, iview_shift            },
  345.  
  346. {    NULL,                S, iview_clear_masks        },
  347. {    NULL,                S, iview_slice_variable        },
  348. {    NULL,                S, iview_real_to_screen        },
  349. {    NULL,                S, iview_screen_to_real        },
  350. {    NULL,                S, iview_scaled_to_screen    },
  351. {    NULL,                S, iview_screen_to_scaled    },
  352. {    NULL,                S, iview_points_in_rect        },
  353. {    NULL,                S, iview_adjust_depth_cuing    },
  354.  
  355. {    NULL,                S, iview_spin_allocate        },
  356. {    NULL,                S, iview_spin_content_variables    },
  357. {    NULL,                S, iview_spin_showing_axes    },
  358. {    NULL,                S, iview_spin_depth_cuing    },
  359. {    NULL,                S, iview_spin_resize        },
  360. {    NULL,                S, iview_spin_redraw_content    },
  361. {    NULL,                S, iview_spin_rotate        },
  362. {    NULL,                S, iview_spin_angle        },
  363. {    NULL,                S, iview_spin_rotate        },
  364. {    NULL,                S, iview_spin_draw_axes        },
  365.  
  366. {    NULL,                S, iview_scatmat_allocate    },
  367. {    NULL,                S, iview_scatmat_resize        },
  368. {    NULL,                S, xsobject_null_method        },
  369. {    NULL,                S, iview_scatmat_redraw_content    },
  370. {    NULL,                S, iview_scatmat_click        },
  371. {    NULL,                S, iview_scatmat_motion        },
  372. {    NULL,                S, iview_scatmat_add_points    },
  373. {    NULL,                S, iview_scatmat_add_lines    },
  374. #ifdef USESTRINGS
  375. {    NULL,                S, iview_scatmat_add_strings    },
  376. #endif /* USESTRINGS */
  377. {    NULL,                S, iview_scatmat_adjust_screen_point},
  378. {    NULL,                S, iview_scatmat_adjust_points_in_rect},
  379. {    NULL,                S, iview_scatmat_mark_points_in_rect},
  380.  
  381. {    NULL,                S, iview_list_allocate        },
  382. {    NULL,                S, xsobject_null_method        },
  383. {    NULL,                S, iview_list_redraw_content    },
  384. {    NULL,                S, iview_list_add_points    },
  385. {    NULL,                S, iview_list_adjust_screen_point},
  386. {    NULL,                S, iview_list_adjust_points_in_rect},
  387. {    NULL,                S, iview_list_mark_points_in_rect},
  388.  
  389. {    NULL,                S, iview_hist_isnew        },
  390. {    NULL,                S, iview_hist_allocate        },
  391. {    NULL,                S, iview_hist_add_points    },
  392. {    NULL,                S, iview_hist_clear_points    },
  393. {    NULL,                S, iview_hist_resize        },
  394. {    NULL,                S, iview_hist_redraw_content    },
  395. {    NULL,                S, iview_hist_adjust_screen    },
  396. {    NULL,                S, iview_hist_num_bins        },
  397. {    NULL,                S, iview_hist_bin_counts    },
  398. {    NULL,                S, iview_hist_adjust_to_data    },
  399. {    NULL,                S, iview_hist_adjust_screen_point},
  400. {    NULL,                S, iview_hist_adjust_points_in_rect},
  401. {    NULL,                S, iview_hist_mark_points_in_rect},
  402.  
  403. {    NULL,                S, iview_plot2d_add_points    },
  404. {    NULL,                S, iview_plot2d_add_lines    },
  405. #ifdef USESTRINGS
  406. {    NULL,                S, iview_plot2d_add_strings    },
  407. #endif /* USESTRINGS */
  408. {    NULL,                S, iview_plot2d_adjust_to_data    },
  409.  
  410. /* compound.c */
  411. {    NULL,                S, xsobject_null_method        },
  412. {    NULL,                S, xsobject_null_method        },
  413. {    NULL,                S, xsobject_null_method        },
  414. {    NULL,                S, xsobject_null_method        },
  415.  
  416. /************************************************************************/
  417. /************************************************************************/
  418. /**                                                                    **/
  419. /**                        Regular Functions                           **/
  420. /**                                                                    **/
  421. /************************************************************************/
  422. /************************************************************************/
  423.  
  424. /* dialog.c */
  425. {    "SYSBEEP",            S, xssysbeep            },
  426. {    "NUM-TO-STRING",        S, xsnumtostring        },
  427. #if defined(MACINTOSH)||defined(AMIGA)
  428. {    "ABOUT-XLISP-STAT",        S, xsabout_xlisp_stat        },
  429.  
  430. /* edit.c */
  431. {    "OPEN-FILE-DIALOG",        S, xsopenfiledialog        },
  432. {    "SET-FILE-DIALOG",        S, xssetfiledialog        },
  433. #endif MACINTOSH||AMIGA
  434. #ifdef MACINTOSH
  435. {    "SET-VOLUME",            S, xssetvolume            },
  436. {    "FRONT-WINDOW",            S, xsfrontwindow        },
  437. {    "HIDE-FRONT-WINDOW",        S, xshidefrontwindow        },
  438. {    "SYSTEM-EDIT",            S, xssystem_edit        },
  439. #endif MACINTOSH
  440.  
  441. /* experimental.c */
  442. {    "TIME",                F, xstime            },
  443. {    "GET-INTERNAL-RUN-TIME",    S, xs_get_internal_run_time    },
  444. {    "GET-INTERNAL-REAL-TIME",    S, xs_get_internal_real_time    },
  445. {    "GETENV",            S, xsgetenv            },
  446. #ifdef AMIGA
  447. {  "SYSTEM",                    S, xsystem                      },
  448. {  "AREXX",                     S, xarexx                       },
  449. #endif AMIGA
  450. /* common.c */
  451. {    "APROPOS",            S, xsapropos            },
  452. {    "APROPOS-LIST",            S, xsaproposlist        },
  453. {    "IDENTITY",            S, xsidentity            },
  454. {    "MAKE-LIST",            S, xsmklist            },
  455. {    "ADJOIN",            S, xsadjoin            },
  456. {    "FILE-POSITION",        S, xsfileposition        },
  457. {    "FORMAT",            S, xsformat            },
  458. {    "FORCE-OUTPUT",            S, xsforce_output        },
  459. {    "COPY-LIST",            S, xscopylist            },
  460. {    "COPY-SEQ",            S, xscopyseq            },
  461. {    "REDUCE",            S, xsreduce            },
  462. {    "MAP",                S, xsmap            },
  463. {    "ELT",                S, xselt            },
  464. {    "COERCE",            S, xscoerce            },
  465. {    "APPLY",            S, xsapply            },
  466. {    "EVAL",                S, xseval            },
  467. {    "LOAD",                S, xsload            },
  468. {    "COMPLEXP",            S, xscomplexp            },
  469. {    "COMPLEX",            S, xsrcomplex            },
  470. {    "CONJUGATE",            S, xsrconjugate            },
  471. {    "REALPART",            S, xsrrealpart            },
  472. {    "IMAGPART",            S, xsrimagpart            },
  473. {    "EQL",                S, xseql            },
  474. {    "EQUAL",            S, xsequal            },
  475. {    "DEFCONSTANT",            F, xsdefconstant        },
  476. {    "DEFPARAMETER",            F, xsdefparameter        },
  477. {    "DEFVAR",            F, xsdefvar            },
  478. {    "MAKUNBOUND",            S, xsmakunbound            },
  479. {    "FMAKUNBOUND",            S, xsfmakunbound        },
  480. {    "MAKE-STRING",            S, xsmake_string        },
  481. {    "CONCATENATE",            S, xsconcatenate        },
  482. {    "SOME",                S, xssome            },
  483. {    "EVERY",            S, xsevery            },
  484. {    "NOTANY",            S, xsnotany            },
  485. {    "NOTEVERY",            S, xsnotevery            },
  486. {    "UNION",            S, xsunion            },
  487. {    "INTERSECTION",            S, xsintersection        },
  488. {    "SET-DIFFERENCE",        S, xsset_difference        },
  489. {    "SUBSETP",            S, xssubsetp            },
  490. {    "REMOVE-DUPLICATES",        S, xsremove_duplicates        },
  491. {    "BUTLAST",            S, xsbutlast            },
  492. {    "FIND",                S, xsfind            },
  493. {    "POSITION",            S, xsposition            },
  494. {    "ERROR",            S, xserror            },
  495. {    "BREAK",            S, xsbreak            },
  496.  
  497. /* commonarrays.c */
  498. {    "ARRAYP",            S, xsarrayp            },
  499. {    "ARRAY-IN-BOUNDS-P",        S, xsarrayinboundsp        },
  500. {    "ARRAY-DIMENSIONS",        S, xsarraydimensions        },
  501. {    "ARRAY-RANK",            S, xsarrayrank            },
  502. {    "ARRAY-TOTAL-SIZE",        S, xsarraytotalsize        },
  503. {    "ARRAY-DIMENSION",        S, xsarraydimension        },
  504. {    "ARRAY-ROW-MAJOR-INDEX",    S, xsarrayrowmajorindex        },
  505. {    "AREF",                S, xsaref            },
  506. {    "MAKE-ARRAY",            S, xsmakearray            },
  507.  
  508. /* distributions.c */
  509. {    "NORMAL-CDF",            S, xsrnormalcdf            },
  510. {    "BETA-CDF",            S, xsrbetacdf            },
  511. {    "GAMMA-CDF",            S, xsrgammacdf            },
  512. {    "CHISQ-CDF",            S, xsrchisqcdf            },
  513. {    "T-CDF",            S, xsrtcdf            },
  514. {    "F-CDF",            S, xsrfcdf            },
  515. {    "CAUCHY-CDF",            S, xsrcauchycdf            },
  516. {    "LOG-GAMMA",            S, xsrloggamma            },
  517. {    "BIVNORM-CDF",            S, xsrbnormcdf            },
  518. {    "NORMAL-QUANT",            S, xsrnormalquant        },
  519. {    "CAUCHY-QUANT",            S, xsrcauchyquant        },
  520. {    "BETA-QUANT",            S, xsrbetaquant            },
  521. {    "GAMMA-QUANT",            S, xsrgammaquant        },
  522. {    "CHISQ-QUANT",            S, xsrchisqquant        },
  523. {    "T-QUANT",            S, xsrtquant            },
  524. {    "F-QUANT",            S, xsrfquant            },
  525. {    "NORMAL-DENS",            S, xsrnormaldens        },
  526. {    "CAUCHY-DENS",            S, xsrcauchydens        },
  527. {    "BETA-DENS",            S, xsrbetadens            },
  528. {    "GAMMA-DENS",            S, xsrgammadens            },
  529. {    "CHISQ-DENS",            S, xsrchisqdens            },
  530. {    "T-DENS",            S, xsrtdens            },
  531. {    "F-DENS",            S, xsrfdens            },
  532. {    "UNIFORM-RAND",            S, xsruniformrand        },
  533. {    "NORMAL-RAND",            S, xsrnormalrand        },
  534. {    "CAUCHY-RAND",            S, xsrcauchyrand        },
  535. {    "GAMMA-RAND",            S, xsrgammarand            },
  536. {    "CHISQ-RAND",            S, xsrchisqrand            },
  537. {    "T-RAND",            S, xsrtrand            },
  538. {    "BETA-RAND",            S, xsrbetarand            },
  539. {    "F-RAND",            S, xsrfrand            },
  540.  
  541. /* ddistributions.c */
  542. {    "BINOMIAL-CDF",            S, xsrbinomialcdf        },
  543. {    "POISSON-CDF",            S, xsrpoissoncdf        },
  544. {    "BINOMIAL-PMF",            S, xsrbinomialpmf        },
  545. {    "POISSON-PMF",            S, xsrpoissonpmf        },
  546. {    "BINOMIAL-QUANT",        S, xsrbinomialquant        },
  547. {    "POISSON-QUANT",        S, xsrpoissonquant        },
  548. {    "BINOMIAL-RAND",        S, xsrbinomialrand        },
  549. {    "POISSON-RAND",            S, xsrpoissonrand        },
  550.  
  551. /* linalg.c */
  552. {    "LU-DECOMP",            S, xslu_decomp            },
  553. {    "LU-SOLVE",            S, xslu_solve            },
  554. {    "DETERMINANT",            S, xslu_determinant        },
  555. {    "INVERSE",            S, xslu_inverse            },
  556. {    "SV-DECOMP",            S, xssv_decomp            },
  557. {    "QR-DECOMP",            S, xsqr_decomp            },
  558. {    "CHOL-DECOMP",            S, xschol_decomp        },
  559. {    "RCONDEST",            S, xsrcondest            },
  560. {    "MAKE-ROTATION",        S, xsmake_rotation        },
  561. {    "SPLINE",            S, xsspline            },
  562. {    "KERNEL-DENS",            S, xskernel_dens        },
  563. {    "KERNEL-SMOOTH",        S, xskernel_smooth        },
  564. {    "base-lowess",            S, xsbase_lowess        },
  565. {    "SURFACE-CONTOUR",        S, xssurface_contour        },
  566. {    "FFT",                S, xsfft            },
  567.  
  568. /* matrices1.c */
  569. {    "MATMULT",            S, xsmatmult            },
  570. {    "%*",                S, xsmatmult            },
  571. {    "INNER-PRODUCT",        S, xsmatmult            },
  572. {    "CROSS-PRODUCT",        S, xscrossproduct        },
  573. {    "DIAGONAL",            S, xsdiagonal            },
  574. {    "IDENTITY-MATRIX",        S, xsidentitymatrix        },
  575. {    "OUTER-PRODUCT",        S, xsouterproduct        },
  576. {    "ROW-LIST",            S, xsrowlist            },
  577. {    "COLUMN-LIST",            S, xscolumnlist            },
  578. {    "BIND-ROWS",            S, xsbindrows            },
  579. {    "BIND-COLUMNS",            S, xsbindcols            },
  580. {    "TRANSPOSE",            S, xstranspose            },
  581.  
  582. /* matrices2.c */
  583. {    "MAKE-SWEEP-MATRIX",        S, xsmakesweepmatrix        },
  584. {    "SWEEP-OPERATOR",        S, xssweepoperator        },
  585.  
  586. /* basics.c */
  587. {    "SEQUENCEP",            S, xssequencep            },
  588. {    "COPY-VECTOR",            S, xscopyvector            },
  589. {    "COPY-ARRAY",            S, xscopyarray            },
  590. {    "SPLIT-LIST",            S, xssplitlist            },
  591. {    "WHICH",            S, xswhich            },
  592. {    "ISEQ",                S, xsiseq            },
  593. {    "REPEAT",            S, xsrepeat            },
  594. {    "SELECT",            S, xsselect            },
  595. {    "SET-SELECT",            S, xssetselect            },
  596. {    "PERMUTE-ARRAY",        S, xspermutearray        },
  597. #ifdef SAVERESTORE
  598. {    "RESTORE",            S, xsrestore            },
  599. #endif
  600.  
  601. /* compound.c */
  602. {    "COMPOUND-DATA-P",        S, xscompoundp            },
  603. {    "COMPOUND-DATA-LENGTH",        S, xscompound_length        },
  604. {    "COMPOUND-DATA-SEQ",        S, xscompound_seq        },
  605. {    "MAP-ELEMENTS",            S, xsmap_elements        },
  606.  
  607. /* math.c */
  608. {    "+",                S, xsradd            },
  609. {    "-",                S, xsrsub            },
  610. {    "*",                S, xsrmul            },
  611. {    "/",                S, xsrdiv            },
  612. {    "REM",                S, xsrrem            },
  613. {    "PMIN",                S, xsrmin            },
  614. {    "PMAX",                S, xsrmax            },
  615. {    "^",                S, xsrexpt            },
  616. {    "**",                S, xsrexpt            },
  617. {    "EXPT",                S, xsrexpt            },
  618. {    "LOG",                S, xsrlog            },
  619.  
  620. {    "LOGAND",            S, xsrlogand            },
  621. {    "LOGIOR",            S, xsrlogior            },
  622. {    "LOGXOR",            S, xsrlogxor            },
  623. {    "LOGNOT",            S, xsrlognot            },
  624.  
  625. {    "ABS",                S, xsrabs            },
  626. {    "1+",                S, xsradd1            },
  627. {    "1-",                S, xsrsub1            },
  628. {    "SIN",                S, xsrsin            },
  629. {    "COS",                S, xsrcos            },
  630. {    "TAN",                S, xsrtan            },
  631. {    "EXP",                S, xsrexp            },
  632. {    "SQRT",                S, xsrsqrt            },
  633. {    "TRUNCATE",            S, xsrfix            },
  634. {    "FLOAT",            S, xsrfloat            },
  635. {    "RANDOM",            S, xsrrand            },
  636. {    "FLOOR",            S, xsrfloor            },
  637. {    "CEILING",            S, xsrceil            },
  638. {    "ROUND",            S, xsrround            },
  639. {    "ASIN",                S, xsrasin            },
  640. {    "ACOS",                S, xsracos            },
  641. {    "ATAN",                S, xsratan            },
  642. {    "PHASE",            S, xsrphase            },
  643.  
  644. {    "MINUSP",            S, xsrminusp            },
  645. {    "ZEROP",            S, xsrzerop            },
  646. {    "PLUSP",            S, xsrplusp            },
  647. {    "EVENP",            S, xsrevenp            },
  648. {    "ODDP",                S, xsroddp            },
  649.  
  650. {    "<",                S, xsrlss            },
  651. {    "<=",                S, xsrleq            },
  652. {    "=",                S, xsrequ            },
  653. {    "/=",                S, xsrneq            },
  654. {    ">=",                S, xsrgeq            },
  655. {    ">",                S, xsrgtr            },
  656.  
  657. /* objects.c */
  658. {    "KIND-OF-P",            S, xskind_of_p            },
  659. {    "SLOT-VALUE",            S, xsslot_value            },
  660. {    "MAKE-OBJECT",            S, xsmake_object        },
  661. {    "SEND",                S, xmsend            },
  662. {    "SEND-SUPER",            S, xmsendsuper            },
  663. {    "CALL-NEXT-METHOD",        S, xscall_next            },
  664. {    "CALL-METHOD",            S, xscall_method        },
  665. {    "DEFMETH",            F, xsdefmeth            },
  666. {    "DEFPROTO",            F, xsdefproto            },
  667.  
  668. /* optimize.c */
  669. #ifdef OPTIMIZE
  670. {    "BRACKET-SEARCH",        S, xsbracket_search        },
  671. {    "GOLDEN-SEARCH",        S, xsgolden_search        },
  672. {    "PARABOLIC-SEARCH",        S, xsparabolic_search        },
  673. #endif OPTIMIZE
  674.  
  675. /* sortdata.c */
  676. {    "SORT-DATA",            S, xssortdata            },
  677. {    "ORDER",            S, xsorder            },
  678. {    "RANK",                S, xsrank            },
  679.  
  680. /* statistics.c */
  681. {    "QUANTILE",            S, xsquantile            },
  682. {    "SUM",                S, xssum            },
  683. {    "PROD",                S, xsprod            },
  684. {    "MIN",                S, xsmin            },
  685. {    "MAX",                S, xsmax            },
  686. {    "COUNT-ELEMENTS",        S, xscount            },
  687. {    "ELEMENT-SEQ",            S, xselement_seq        },
  688. {    "IF-ELSE",            S, xsifelse            },
  689. {    "MEAN",                S, xsmean            },
  690. {    "SAMPLE",            S, xssample            },
  691.  
  692. /* uni.c */
  693. {    "MAKE-RANDOM-STATE",        S, xsmake_random_state        },
  694. {    "RANDOM-STATE-P",        S, xsrandom_state_p        },
  695.  
  696. /* windows.c */
  697. {    "SCREEN-SIZE",            S, xsscreen_size        },
  698. {    "SCREEN-HAS-COLOR",        S, xsscreen_has_color        },
  699. {    "FLUSH-GRAPHICS",        S,  xsflush_graphics        },
  700.  
  701. /* xsiviewwindow.c */
  702. {    "RESET-GRAPHICS-BUFFER",    S, iview_window_reset_buffer    },
  703. {    "MAKE-COLOR",            S, gw_make_color        },
  704. {    "FREE-COLOR",            S, gw_free_color        },
  705. {    "MAKE-CURSOR",            S, gw_make_cursor        },
  706. {    "FREE-CURSOR",            S, gw_free_cursor        },
  707.  
  708. /* xsiviewinternal.c */
  709. {    "UNLINK-ALL-WINDOWS",        S, iview_unlink_all_windows    },
  710.  
  711. /* xsiview.c */
  712. {    "GET-NICE-RANGE",        S, iview_get_nice_range        },
  713.  
  714. /* xsgraphics.c */
  715. {    "HISTOGRAM",            S, xshistogram            },
  716. {    "PLOT-POINTS",            S, xsplot_points        },
  717. {    "PLOT-LINES",            S, xsplot_lines            },
  718. {    "SPIN-PLOT",            S, xsspin_plot            },
  719. {    "SCATTERPLOT-MATRIX",        S, xsscatterplot_matrix        },
  720. {    "NAME-LIST",            S, xsnamelist            },
  721. #ifdef UNIX
  722. {    "GNU-PLOT-POINTS",        S, gnupointplot            },
  723. {    "GNU-PLOT-LINES",               S, gnulineplot            },
  724. #endif UNIX
  725.  
  726. #ifdef MACINTOSH
  727. /* macxsgraph.c */
  728. {    "PICK-COLOR",            S, xspick_color            },
  729.  
  730. /* macdynload.c */
  731. {    "OPEN-RESOURCE-FILE",        S, xsopen_resfile        },
  732. {    "CLOSE-RESOURCE-FILE",        S, xsclose_resfile        },
  733. {    "CALL-CFUN",            S, xscall_cfun            },
  734. #endif MACINTOSH
  735.  
  736. #ifdef X11WINDOWS
  737. {    "PARSE-COLOR",            S, xsparse_color        },
  738. {    "BEST-CURSOR-SIZE",        S, xsbest_cursor_size        },
  739. {    "BITMAP-FROM-FILE",        S, xsbitmap_from_file        },
  740. {    "X11-OPTIONS",            S, xsx11_options        },
  741. #endif X11WINDOWS
  742.  
  743. #ifdef FOREIGNCALL
  744. {    "DYN-LOAD",            S, xsdynload            },
  745. {    "CALL-CFUN",            S, xscall_cfun            },
  746. {    "CALL-FSUB",            S, xscall_fsub            },
  747. {    "CALL-LFUN",            S, xscall_lfun            },
  748. #endif FOREIGNCALL
  749. #ifdef UNIX
  750. {    "SYSTEM",            S, xssystem            },
  751. #endif UNIX
  752.  
  753. /* xsbayes.c */
  754. {    "NUMGRAD",            S, xsnumgrad            },
  755. {    "NUMHESS",            S, xsnumhess            },
  756. {    "minfo-isnew",            S, xsminfo_isnew        },
  757. {    "minfo-maximize",        S, xsminfo_maximize        },
  758. {    "minfo-loglap",            S, xsminfo_loglap        },
  759. {    "AX+Y",                S, xsaxpy            },
  760. #endif XLISP_ONLY
  761. #endif OSPTRS_H
  762.